home *** CD-ROM | disk | FTP | other *** search
/ MacWorld: Super Stacks! / Macworld CD.iso / Home / Home / card_18460.txt < prev    next >
Text File  |  1990-09-14  |  5KB  |  195 lines
  1. -- card: 18460 from stack: in
  2. -- bmap block id: 19355
  3. -- flags: 0000
  4. -- background id: 18715
  5. -- name: SuperStacks
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global mapLoc, lastLoc, lastCardID
  9.   put the id of this card into lastCardID
  10.   put "SuperStacks" into mapLoc
  11.   put "Opening" into lastLoc
  12.   pass openCard
  13. end openCard
  14.  
  15. on idle
  16.   global haveCheckedColor
  17.   if haveCheckedColor <> "true" then
  18.     if ColorIsOn() then
  19.       answer "Switch to 2 colors to see visual effects."
  20.     end if
  21.   end if
  22.   put "true" into haveCheckedColor  --  Ask only one time
  23. end idle
  24.  
  25. on closeCard
  26.   hide card field "Extra Info"
  27.   set the scroll of card field "Extra Info" to 0
  28. end closeCard
  29.  
  30. on mouseUp
  31.   if visible of card field "Extra Info" then
  32.     hide card field "Extra Info"
  33.     set scroll of card field "Extra Info" to 0
  34.   end if
  35.   pass mouseUp
  36. end mouseUp
  37.  
  38.  
  39. -- part 1 (button)
  40. -- low flags: 00
  41. -- high flags: 2000
  42. -- rect: left=167 top=75 right=161 bottom=271
  43. -- title width / last selected line: 0
  44. -- icon id / first selected line: 0 / 0
  45. -- text alignment: 1
  46. -- font id: 0
  47. -- text size: 12
  48. -- style flags: 0
  49. -- line height: 16
  50. -- part name: Galleries
  51. ----- HyperTalk script -----
  52. on mouseUp
  53.   visual effect iris open
  54.   go to card "Galleries"
  55. end mouseUp
  56.  
  57.  
  58.  
  59. -- part 2 (button)
  60. -- low flags: 00
  61. -- high flags: 2000
  62. -- rect: left=319 top=75 right=161 bottom=423
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 0 / 0
  65. -- text alignment: 1
  66. -- font id: 0
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: Information
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.   visual effect iris open
  74.   go to card "Information Desk"
  75. end mouseUp
  76.  
  77.  
  78.  
  79. -- part 3 (button)
  80. -- low flags: 00
  81. -- high flags: 2000
  82. -- rect: left=167 top=201 right=287 bottom=271
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 0 / 0
  85. -- text alignment: 1
  86. -- font id: 0
  87. -- text size: 12
  88. -- style flags: 0
  89. -- line height: 16
  90. -- part name: Gift Shop
  91. ----- HyperTalk script -----
  92. on mouseUp
  93.   visual effect iris open
  94.   go to card "Gift Shop"
  95. end mouseUp
  96.  
  97.  
  98.  
  99. -- part 4 (button)
  100. -- low flags: 00
  101. -- high flags: 2000
  102. -- rect: left=319 top=201 right=287 bottom=423
  103. -- title width / last selected line: 0
  104. -- icon id / first selected line: 0 / 0
  105. -- text alignment: 1
  106. -- font id: 0
  107. -- text size: 12
  108. -- style flags: 0
  109. -- line height: 16
  110. -- part name: Judges
  111. ----- HyperTalk script -----
  112. on mouseUp
  113.   visual effect iris open
  114.   go to card "Judges Chambers"
  115. end mouseUp
  116.  
  117.  
  118.  
  119. -- part 15 (button)
  120. -- low flags: 00
  121. -- high flags: 2000
  122. -- rect: left=40 top=223 right=240 bottom=80
  123. -- title width / last selected line: 0
  124. -- icon id / first selected line: 0 / 0
  125. -- text alignment: 1
  126. -- font id: 34
  127. -- text size: 12
  128. -- style flags: 256
  129. -- line height: 16
  130. -- part name: INFO
  131. ----- HyperTalk script -----
  132. on mouseUp
  133.   lock screen
  134.   if the visible of card field "Extra Info" then
  135.     hide card field "Extra Info"
  136.   else
  137.     show card field "Extra Info"
  138.   end if
  139.   set the scroll of card field "Extra Info" to 0
  140.   unlock screen
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 17 (field)
  146. -- low flags: 81
  147. -- high flags: 2007
  148. -- rect: left=139 top=70 right=300 bottom=453
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 0
  152. -- font id: 34
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: Extra Info
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   hide card field "Extra Info"
  160.   set scroll of card field "Extra Info" to 0
  161. end mouseUp
  162.  
  163.  
  164. -- part contents for card part 17
  165. ----- text -----
  166. Welcome to the Home Stack of the 1989 Macworld SuperStacks CD ROM.  Correct functioning of many of the winning stacks on this disc depends on this stack being HyperCard‚Äôs Home stack.  Where appropriate, we have replaced the standard Home buttons in the winning stacks with a button displaying the SuperStacks logo 
  167. (shown on the upper left corner of this card.)
  168. ___________________________________
  169.  
  170. Trademarks and Copyrights:
  171.  
  172. Apple, HyperCard and Macintosh are registered trademarks of Apple Computer, Inc.
  173.  
  174. AppleCD SC is a trademark of Apple Computer, Inc.
  175.  
  176. Authorware Professional is a registered trademark of Authorware, Inc.
  177.  
  178. SuperStacks is a registered trademark of International Data Group, Inc.
  179.  
  180. Macworld is a registered trademark of Macworld Communications, Inc.
  181.  
  182. Part of this production was developed using MacroMind's VideoWorks II ¬© 1988 MacroMind, Inc.
  183.  
  184. All music ¬© 1990 de Benedictis Music. All rights reserved.
  185.  
  186. This compilation ¬© 1990 Macworld Communications, Inc. All rights reserved.
  187.  
  188. Individual developers retain the copyrights to their work (s).  All rights reserved.
  189. ___________________________________
  190.  
  191. *Special thanks to Jane Lagas for invaluable assistance.
  192. ___________________________________
  193.  
  194. The stacks on this CD ROM have been tested on all current Macintosh models, under System 6.0.5, using HyperCard 1.2.5.  Some problems were encountered when running on a Mac IIfx with non-Apple video display cards.  If you have difficulties accessing parts of this disc, either contact your dealer, or the vendor of your display card.
  195.